KeyPreview??
Visual Basic ile program yaparken s²k s²k ba■vurdu≡unuz Properties kutucu≡undaki bir ÷zellik hiτ dikkatinizi τektimi? KeyPreview... Bu ÷zellik sadece formlar² biτimlendirirken kar■²n²za τ²kar. Ne i■e yarad²≡²na gelince, klavyeden girdi≡iniz tu■ vuru■lar²n²n Visual Basic'ten ÷nce program²n²z taraf²ndan alg²lanmas²n² sa≡lar. Bunu yapabilmek iτin ise ilk ÷nce bu ÷zelli≡in de≡erini True yapmal² sonra da formunuzun anlayaca≡² tu■ vuru■lar²n² program²n²za tan²tmal²s²n²z. ╓rne≡imizi uygulamak iτin ÷ncelikle bo■ form ⁿzerine de bir text kutusu yarat²n ve formun General - Declarations k²sm²na a■a≡²daki sabitleri yaz²n.
Option Explicit
Const KEY_F1 = &H70
Const KEY_F2 = &H71
Const KEY_ESCAPE = &H1B
▐imdi de bu yukar²da belirtti≡iniz tu■lara bas²ld²≡²nda neler olaca≡²n² tayin edelim.
Yukar²da belirtmedi≡iniz tu■lara bast²≡²n²zda (A■a≡²da bunlar² kullanm²■ olsan²z bile)
Formunuz bunu daha ÷nceden oldu≡u gibi s²radan tu■ vuru■lar² olarak alg²layacakt²r.
Sub Form_KeyDown (KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case KEY_F1: Text1.text = Date$ ' F1 tu■una bas²ld²≡²nda metin kutusundaki metin
' silinsin ve yerine tarih atans²n.
Case KEY_F2: Text1.Text = Time$ 'F2 tu■u ise metin kutumuza zaman² yazs²n
Case KEY_ESCAPE: Unload Me ' ESC tu■umuz ise aktif formu bellekten ats²n.
End Select
End Sub
Programlar²n²zda kullanabilece≡iniz di≡er tu■ kodlar²n² Visual Basic ile gelen ve tⁿm di≡er sabitlerin bulundu≡u CONSTANT.TXT dosyas²ndan bulabilirsiniz. Ayr²ca yukar²da belirtti≡imiz tu■lar² di≡er tu■ kombinasyonlar²yla da kullanabilirsiniz (╓rnek CTRL+ALT+F5 gibi.)
